4D Doc Center : ch_Tableau vers polygone

4D Chart v13

ch_Tableau vers polygone


ch_Tableau vers polygone ( zone ; tableauH ; tableauV ) -> Résultat

Paramètre	Type	Description
zone	Entier long	Zone 4D Chart
tableauH	Tableau réel	Tableau de valeurs horizontales pour les sommets
tableauV	Tableau réel	Tableau de valeurs verticales pour les sommets
Résultat	Entier long	Numéro d'ID du nouvel objet

Description

La commande ch_Tableau vers polygone crée un nouveau polygone dans zone, d’après les tableaux tableauH et tableauV et renvoie l’identifiant du nouvel objet.

tableauH et tableauV donnent la position de chaque sommet du polygone. Les deux tableaux peuvent être de type Réel, Entier long ou Entier, et sont spécifiés en points. Pour obtenir un polygone correct, chaque tableau doit contenir au moins trois éléments. Si les tableaux ne sont pas de même taille, les éléments excédentaires dans le tableau le plus grand sont ignorés. Pour créer un polygone fermé, la dernière valeur dans chaque tableau doit correspondre à la première.

Exemple

L’exemple suivant remplit deux tableaux et crée un polygone à partir d’eux. Ensuite, il déplace et redimensionne le polygone.

 $Sommets:=Num(Demander("Saisissez le nombre de sommets :"))

 Si(OK=1)

  `Déclarer les tableaux

    TABLEAU REEL(TabSommetH;$Sommets)

    TABLEAU REEL(TabSommetV;$Sommets)

  `Remplir les tableaux

    Boucle($i;1;$Sommets)

       TabSommetH{$i}:=Sin($i)

       TabSommetV{$i}:=Cos($i)

    Fin de boucle

  `Dessiner le polygone

    $Poly:=ch_Tableau vers polygone(Zone;TabSommetH;TabSommetV)

  `Déplacer le polygone vers les coordonnées de zone (10,10)

    ch_DEPLACER(Zone;$Poly;10;10)

  `Redimensionner le polygone à 200x200

    ch_MODIFIER TAILLE(Zone;$Poly;200;200)

 Fin de si